Integrand size = 19, antiderivative size = 449 \[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=-\frac {(a+b \text {arccosh}(c x))^2}{2 b e}+\frac {(a+b \text {arccosh}(c x)) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (1+\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (1+\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e} \]
-1/2*(a+b*arccosh(c*x))^2/b/e+1/2*(a+b*arccosh(c*x))*ln(1-(c*x+(c*x-1)^(1/ 2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^(1/2)-(-c^2*d-e)^(1/2)))/e+1/2*(a+b*arcc osh(c*x))*ln(1+(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^(1/2)-(-c ^2*d-e)^(1/2)))/e+1/2*(a+b*arccosh(c*x))*ln(1-(c*x+(c*x-1)^(1/2)*(c*x+1)^( 1/2))*e^(1/2)/(c*(-d)^(1/2)+(-c^2*d-e)^(1/2)))/e+1/2*(a+b*arccosh(c*x))*ln (1+(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^(1/2)+(-c^2*d-e)^(1/2 )))/e+1/2*b*polylog(2,-(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^( 1/2)-(-c^2*d-e)^(1/2)))/e+1/2*b*polylog(2,(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2) )*e^(1/2)/(c*(-d)^(1/2)-(-c^2*d-e)^(1/2)))/e+1/2*b*polylog(2,-(c*x+(c*x-1) ^(1/2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^(1/2)+(-c^2*d-e)^(1/2)))/e+1/2*b*pol ylog(2,(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))*e^(1/2)/(c*(-d)^(1/2)+(-c^2*d-e)^ (1/2)))/e
Time = 0.11 (sec) , antiderivative size = 447, normalized size of antiderivative = 1.00 \[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=-\frac {b \text {arccosh}(c x)^2}{2 e}+\frac {b \text {arccosh}(c x) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \text {arccosh}(c x) \log \left (1+\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \text {arccosh}(c x) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \text {arccosh}(c x) \log \left (1+\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {a \log \left (d+e x^2\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}+\sqrt {-c^2 d-e}}\right )}{2 e} \]
-1/2*(b*ArcCosh[c*x]^2)/e + (b*ArcCosh[c*x]*Log[1 - (Sqrt[e]*E^ArcCosh[c*x ])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e])])/(2*e) + (b*ArcCosh[c*x]*Log[1 + (Sq rt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e])])/(2*e) + (b*ArcCo sh[c*x]*Log[1 - (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2*d) - e]) ])/(2*e) + (b*ArcCosh[c*x]*Log[1 + (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2*d) - e])])/(2*e) + (a*Log[d + e*x^2])/(2*e) + (b*PolyLog[2, -(( Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e]))])/(2*e) + (b*Po lyLog[2, (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e])])/(2*e ) + (b*PolyLog[2, -((Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2*d) - e]))])/(2*e) + (b*PolyLog[2, (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[ -(c^2*d) - e])])/(2*e)
Time = 1.14 (sec) , antiderivative size = 449, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.105, Rules used = {6374, 2009}
Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.
\(\displaystyle \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx\) |
\(\Big \downarrow \) 6374 |
\(\displaystyle \int \left (\frac {a+b \text {arccosh}(c x)}{2 \sqrt {e} \left (\sqrt {-d}+\sqrt {e} x\right )}-\frac {a+b \text {arccosh}(c x)}{2 \sqrt {e} \left (\sqrt {-d}-\sqrt {e} x\right )}\right )dx\) |
\(\Big \downarrow \) 2009 |
\(\displaystyle \frac {(a+b \text {arccosh}(c x)) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {c^2 (-d)-e}}\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {c^2 (-d)-e}}+1\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (1-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{\sqrt {c^2 (-d)-e}+c \sqrt {-d}}\right )}{2 e}+\frac {(a+b \text {arccosh}(c x)) \log \left (\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{\sqrt {c^2 (-d)-e}+c \sqrt {-d}}+1\right )}{2 e}-\frac {(a+b \text {arccosh}(c x))^2}{2 b e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-d c^2-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{c \sqrt {-d}-\sqrt {-d c^2-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,-\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{\sqrt {-d} c+\sqrt {-d c^2-e}}\right )}{2 e}+\frac {b \operatorname {PolyLog}\left (2,\frac {\sqrt {e} e^{\text {arccosh}(c x)}}{\sqrt {-d} c+\sqrt {-d c^2-e}}\right )}{2 e}\) |
-1/2*(a + b*ArcCosh[c*x])^2/(b*e) + ((a + b*ArcCosh[c*x])*Log[1 - (Sqrt[e] *E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e])])/(2*e) + ((a + b*ArcCo sh[c*x])*Log[1 + (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e] )])/(2*e) + ((a + b*ArcCosh[c*x])*Log[1 - (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt [-d] + Sqrt[-(c^2*d) - e])])/(2*e) + ((a + b*ArcCosh[c*x])*Log[1 + (Sqrt[e ]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2*d) - e])])/(2*e) + (b*PolyLog[2 , -((Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e]))])/(2*e) + (b*PolyLog[2, (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] - Sqrt[-(c^2*d) - e])]) /(2*e) + (b*PolyLog[2, -((Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2 *d) - e]))])/(2*e) + (b*PolyLog[2, (Sqrt[e]*E^ArcCosh[c*x])/(c*Sqrt[-d] + Sqrt[-(c^2*d) - e])])/(2*e)
3.5.92.3.1 Defintions of rubi rules used
Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)*((f_.)*(x_))^(m_.)*((d_) + (e _.)*(x_)^2)^(p_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*ArcCosh[c*x])^n, (f*x)^m*(d + e*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, f}, x] && NeQ[c^2*d + e, 0] && IGtQ[n, 0] && IntegerQ[p] && IntegerQ[m]
Result contains higher order function than in optimal. Order 9 vs. order 4.
Time = 0.88 (sec) , antiderivative size = 1987, normalized size of antiderivative = 4.43
method | result | size |
derivativedivides | \(\text {Expression too large to display}\) | \(1987\) |
default | \(\text {Expression too large to display}\) | \(1987\) |
parts | \(\text {Expression too large to display}\) | \(1988\) |
1/c^2*(1/2*a*c^2/e*ln(c^2*e*x^2+c^2*d)+b*c^2*(-1/2/e*arccosh(c*x)^2+1/2*(2 *c^2*d-2*(d*c^2*(c^2*d+e))^(1/2)+e)/e^2*ln(1-e*(c*x+(c*x-1)^(1/2)*(c*x+1)^ (1/2))^2/(-2*c^2*d-2*(d*c^2*(c^2*d+e))^(1/2)-e))*arccosh(c*x)+1/4*(-2*(d*c ^2*(c^2*d+e))^(1/2)*c^2*d+2*c^4*d^2+2*c^2*d*e-(d*c^2*(c^2*d+e))^(1/2)*e)/c ^2/d/e/(c^2*d+e)*arccosh(c*x)^2-1/8*(-2*(d*c^2*(c^2*d+e))^(1/2)*c^2*d+2*c^ 4*d^2+2*c^2*d*e-(d*c^2*(c^2*d+e))^(1/2)*e)/c^2/d/e/(c^2*d+e)*polylog(2,e*( c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))^2/(-2*c^2*d-2*(d*c^2*(c^2*d+e))^(1/2)-e)) -1/4*(d*c^2*(c^2*d+e))^(1/2)/d/c^2/(c^2*d+e)*arccosh(c*x)*ln(1-e*(c*x+(c*x -1)^(1/2)*(c*x+1)^(1/2))^2/(-2*c^2*d+2*(d*c^2*(c^2*d+e))^(1/2)-e))+(-2*(d* c^2*(c^2*d+e))^(1/2)*c^2*d+2*c^4*d^2+2*c^2*d*e-(d*c^2*(c^2*d+e))^(1/2)*e)/ e^2/(c^2*d+e)*arccosh(c*x)^2-1/2*(-2*(d*c^2*(c^2*d+e))^(1/2)*c^2*d+2*c^4*d ^2+2*c^2*d*e-(d*c^2*(c^2*d+e))^(1/2)*e)/e^2/(c^2*d+e)*polylog(2,e*(c*x+(c* x-1)^(1/2)*(c*x+1)^(1/2))^2/(-2*c^2*d-2*(d*c^2*(c^2*d+e))^(1/2)-e))-(2*c^2 *d-2*(d*c^2*(c^2*d+e))^(1/2)+e)/e^3*c^2*d*arccosh(c*x)^2+1/2*(2*c^2*d-2*(d *c^2*(c^2*d+e))^(1/2)+e)/e^3*polylog(2,e*(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2)) ^2/(-2*c^2*d-2*(d*c^2*(c^2*d+e))^(1/2)-e))*d*c^2+1/2*(d*c^2*(c^2*d+e))^(1/ 2)/e/(c^2*d+e)*arccosh(c*x)^2-1/4*(d*c^2*(c^2*d+e))^(1/2)/e/(c^2*d+e)*poly log(2,e*(c*x+(c*x-1)^(1/2)*(c*x+1)^(1/2))^2/(-2*c^2*d+2*(d*c^2*(c^2*d+e))^ (1/2)-e))-1/4*(-2*(d*c^2*(c^2*d+e))^(1/2)*c^2*d+2*c^4*d^2+2*c^2*d*e-(d*c^2 *(c^2*d+e))^(1/2)*e)/c^2/d/e/(c^2*d+e)*ln(1-e*(c*x+(c*x-1)^(1/2)*(c*x+1...
\[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=\int { \frac {{\left (b \operatorname {arcosh}\left (c x\right ) + a\right )} x}{e x^{2} + d} \,d x } \]
\[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=\int \frac {x \left (a + b \operatorname {acosh}{\left (c x \right )}\right )}{d + e x^{2}}\, dx \]
\[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=\int { \frac {{\left (b \operatorname {arcosh}\left (c x\right ) + a\right )} x}{e x^{2} + d} \,d x } \]
b*integrate(x*log(c*x + sqrt(c*x + 1)*sqrt(c*x - 1))/(e*x^2 + d), x) + 1/2 *a*log(e*x^2 + d)/e
\[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=\int { \frac {{\left (b \operatorname {arcosh}\left (c x\right ) + a\right )} x}{e x^{2} + d} \,d x } \]
Timed out. \[ \int \frac {x (a+b \text {arccosh}(c x))}{d+e x^2} \, dx=\int \frac {x\,\left (a+b\,\mathrm {acosh}\left (c\,x\right )\right )}{e\,x^2+d} \,d x \]